home *** CD-ROM | disk | FTP | other *** search
/ The PC-SIG Library 10 / The PC-Sig Library - Shareware for the IBM PC and Compatibles (PC-SIG)(Tenth Edition Disks 1-2804)(1991).iso / PC_SIGCD / 20 / 9 / DISK2092.ZIP / RBBS-LIT.ZIP / LIT / VARCASM.LIT < prev    next >
Text File  |  1990-01-13  |  949b  |  18 lines
  1. *[VARCASM.LIT]****************************************************************
  2. * Description: Forces assembler interface to view archive files.             *
  3. * RBBS-PC Level: CPC17.3                                                √ AM *
  4. * Module Affected: RBBSSUB4.BAS                   √Note: seems this is in    *
  5. * Selection Option: ASMVIEWARC = ON               √baseline code anyway --   *
  6. * Additional files: None                          √view of .ZIPs in BASIC?   *
  7. ******************************************************************************
  8. 64600 SUB ViewArc STATIC
  9.       CLOSE 2
  10.       RetCode = 0                                                   ' KG100403
  11.       CALL ArcV (ZArcWork$,ZFileName$,RetCode)                      ' KG100403
  12.       CALL BufFile (ZArcWork$,WasX)                                 ' KG100403
  13.       END SUB                                                       ' KG100403
  14. 64605
  15. 64610
  16. 64620
  17. 64630
  18.